home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / src / X11 / wais / ui / dirname < prev    next >
Text File  |  1995-05-09  |  178b  |  10 lines
  1. #! /bin/sh
  2. #
  3. #    @(#)dirname.sh 1.5 89/03/22 SMI; from S5R2 1.2
  4. #
  5. PATH=/bin:/usr/bin
  6. expr \
  7.   ${1-.}'/' : '\(/\)[^/]*//*$' \
  8.   \| ${1-.}'/' : '\(.*[^/]\)//*[^/][^/]*//*$' \
  9.   \| .
  10.